\vec{i}

\vec{j}

\vec{k}

point A

point B

x

y

z

axes complets

z_B = 4 (slider from -5 to 7, step 1)
y_B = 1 (slider from -5 to 7, step 1)
x_B = 4 (slider from -5 to 7, step 1)
O = (0, 0)
k = (0, 1)
u = (-1.6508170383568577, -1.357578672615198)
i: (0.8 * u / Length[u])
j = (1, 0)
w_B: (x_B * i) + (y_B * j) + (z_B * k)
z_A = 2 (slider from -5 to 7, step 1)
x_A = 2 (slider from -5 to 7, step 1)
y_A = 3 (slider from -5 to 7, step 1)
w_A: (x_A * i) + (y_A * j) + (z_A * k)
I = Translate(O, i)
J = Translate(O, j)
K = Translate(O, k)
a = Ray(O, I)
b = Ray(O, J)
c = Ray(O, K)
A1 = Translate(O, i)
B1 = Translate(O, j)
C1 = Translate(O, k)
A2 = Translate(A1, i)
B2 = Translate(B1, j)
C2 = Translate(C1, k)
A3 = Translate(A2, i)
B3 = Translate(B2, j)
C3 = Translate(C2, k)
A4 = Translate(A3, i)
B4 = Translate(B3, j)
C4 = Translate(C3, k)
A5 = Translate(A4, i)
B5 = Translate(B4, j)
C5 = Translate(C4, k)
A6 = Translate(A5, i)
B6 = Translate(B5, j)
C6 = Translate(C5, k)
A7 = Translate(A6, i)
B7 = Translate(B6, j)
C7 = Translate(C6, k)
A8 = Translate(A7, i)
B8 = Translate(B7, j)
C8 = Translate(C7, k)
A9 = Translate(A8, i)
B9 = Translate(B8, j)
C9 = Translate(C8, k)
A10 = Translate(A9, i)
B10 = Translate(B9, j)
C10 = Translate(C9, k)
A11 = Translate(A10, i)
B11 = Translate(B10, j)
C11 = Translate(C10, k)
A12 = Translate(A11, i)
B12 = Translate(B11, j)
C12 = Translate(C11, k)
A13 = Translate(A12, i)
B13 = Translate(B12, j)
C13 = Translate(C12, k)
A14 = Translate(A13, i)
B14 = Translate(B13, j)
C14 = Translate(C13, k)
A15 = Translate(A14, i)
B15 = Translate(B14, j)
C15 = Translate(C14, k)
A16 = Translate(A15, i)
B16 = Translate(B15, j)
C16 = Translate(C15, k)
A17 = Translate(A16, i)
B17 = Translate(B16, j)
C17 = Translate(C16, k)
A = Translate(O, w_A)
B = Translate(O, w_B)
v = Vector(A, B)
A_x: (x_A * i)
A_y: (y_A * j)
A_z: (z_A * k)
A_{xy} = Translate(O, Vector[(x_A * i) + (y_A * j)])
h = Segment(A_x, A_{xy})
n = Segment(A, A_{xy})
p = Segment(O, A_{xy})
l = Segment(A_{xy}, A_y)
m = Segment(A_z, A)
B_x: (x_B * i)
B_y: (y_B * j)
B_{xy} = Translate(O, Vector[(x_B * i) + (y_B * j)])
B_z: (z_B * k)
s = Segment(B_{xy}, B)
poly1, a_1, b_1, c_1, d_1 = Polygon(O, A_x, A_{xy}, A_y)
poly2, e_1, f_1, g_1, h_1 = Polygon(O, B_x, B_{xy}, B_y)
t = Segment(B_z, B)
r = Segment(B_{xy}, B_y)
q = Segment(B_x, B_{xy})
o = true
w = true
d = Segment(O, B_{xy})
O' = Mirror(O, O)
I' = Mirror(I, O)
a' = Ray(O', I')
O'_1 = Mirror(O, O)
J' = Mirror(J, O)
b' = Ray(O'_1, J')
O'_2 = Mirror(O, O)
K' = Mirror(K, O)
c' = Ray(O'_2, K')
D1 = Mirror(A1, O)
E1 = Mirror(B1, O)
F1 = Mirror(C1, O)
D2 = Mirror(A2, O)
E2 = Mirror(B2, O)
F2 = Mirror(C2, O)
D3 = Mirror(A3, O)
E3 = Mirror(B3, O)
F3 = Mirror(C3, O)
D4 = Mirror(A4, O)
E4 = Mirror(B4, O)
F4 = Mirror(C4, O)
D5 = Mirror(A5, O)
E5 = Mirror(B5, O)
F5 = Mirror(C5, O)
D6 = Mirror(A6, O)
E6 = Mirror(B6, O)
F6 = Mirror(C6, O)
D7 = Mirror(A7, O)
E7 = Mirror(B7, O)
F7 = Mirror(C7, O)
D8 = Mirror(A8, O)
E8 = Mirror(B8, O)
F8 = Mirror(C8, O)
D9 = Mirror(A9, O)
E9 = Mirror(B9, O)
F9 = Mirror(C9, O)
D10 = Mirror(A10, O)
E10 = Mirror(B10, O)
F10 = Mirror(C10, O)
D11 = Mirror(A11, O)
E11 = Mirror(B11, O)
F11 = Mirror(C11, O)
D12 = Mirror(A12, O)
E12 = Mirror(B12, O)
F12 = Mirror(C12, O)
D13 = Mirror(A13, O)
E13 = Mirror(B13, O)
F13 = Mirror(C13, O)
D14 = Mirror(A14, O)
E14 = Mirror(B14, O)
F14 = Mirror(C14, O)
D15 = Mirror(A15, O)
E15 = Mirror(B15, O)
F15 = Mirror(C15, O)
D16 = Mirror(A16, O)
E16 = Mirror(B16, O)
F16 = Mirror(C16, O)
D17 = Mirror(A17, O)
E17 = Mirror(B17, O)
F17 = Mirror(C17, O)
e = true